*Description: See README File

clear
use "D:\Dropbox\Dropbox\Lueck and Parker\JAERE submission\Final Version 2024\Data and Code for Replication\Expenditures.dta"
joinby year fips using "D:\Dropbox\Dropbox\Lueck and Parker\JAERE submission\Final Version 2024\Data and Code for Replication\Ag1945_2007.dta", unmatched(master)
drop _merge
joinby year fips using "D:\Dropbox\Dropbox\Lueck and Parker\JAERE submission\Final Version 2024\Data and Code for Replication\Pop_PCI_1942_2008.dta", unmatched(master)
drop _merge
joinby fips using "D:\Dropbox\Dropbox\Lueck and Parker\JAERE submission\Final Version 2024\Data and Code for Replication\Precip_Elevation.dta", unmatched(master)
drop _merge
joinby year fips using "D:\Dropbox\Dropbox\Lueck and Parker\JAERE submission\Final Version 2024\Data and Code for Replication\FedLand.dta", unmatched(master)
drop _merge

*Interpolating missing years for farm data
bysort fips: ipolate facres_ year, g(farmacres_ipo)
gen farmacres000=farmacres_ipo/1000
bysort fips: ipolate farm1000_ year, g(farm1000_ipo)
gen farms_500more=farm500_ + farm1000_
bysort fips: ipolate farms_500more year, g(farms_500more_ipo)
bysort fips: ipolate avfsize_ year, g(avfarmsz_ipo)

*Generating inflation adjusted numbers and normalizing variables to make coefficients readable
gen rstaterev = staterev*cpi_multiplier
gen rstaterev000=rstaterev/1000
gen beapop000=bea_pop/1000
gen fg_exp_tot08 = fg_exp_tot*cpi_multiplier
gen bea_pci08 = bea_pci*cpi_multiplier
gen totacres000= totacres/1000

******

*Table A8: Summary Statistics for Analysis of Agency Expenditures
sum fg_exp_tot08  totacres000 fedacres000_ipo farmacres000 farm1000_ipo farms_500more_ipo avfarmsz_ipo rstaterev000 indep beapop000 bea_pci08 precip_inch mean_elev_ft if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007

*Logging variables for regression analysis
gen lnfg_exp_tot08 =ln(fg_exp_tot08)
gen lnrstaterev=ln(rstaterev)
gen lntotacres=ln(totacres)
gen lnfedacres000_ipo=ln(fedacres000_ipo)
gen lnfarm1000_ipo =ln(farm1000_ipo)
gen lnfarms_500more_ipo = ln(farms_500more_ipo)
gen lnavfarmsz_ipo = ln(avfarmsz_ipo)
gen lnfarmacres_ipo = ln(farmacres000)
gen lnbea_pop =ln(bea_pop)
gen lnbea_pci08=ln(bea_pci08)
gen lnprecip_inch= ln(precip_inch)
gen lnmean_elev_ft=ln(mean_elev_ft)

*Setting up Expenditures Regressions**
tab year, gen(year)
tab fips, gen(fips)
xtset fips

*TABLE 3: Panel Estimates of Agency Expenditures on Wildlife, 1952-2007
eststo clear
eststo: quietly xtreg lnfg_exp_tot08 lnrstaterev lnfarm1000_ipo lnfarmacres_ipo indep lnbea_pop lnbea_pci08 i.year if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007 , fe cluster(fips)
eststo: quietly xtreg lnfg_exp_tot08 lnrstaterev lnfarms_500more_ipo lnfarmacres_ipo indep lnbea_pop lnbea_pci08 if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007 , fe cluster(fips)
eststo: quietly xtreg lnfg_exp_tot08 lnrstaterev lnavfarmsz_ipo lnfarmacres_ipo  indep lnbea_pop lnbea_pci08  i.year  if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007 , fe cluster(fips)
eststo: quietly reg lnfg_exp_tot08 lnrstaterev lnfedacres000_ipo lnfarm1000_ipo lnfarmacres_ipo lntotacres indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft i.year  if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007, cluster(fips)
eststo: quietly reg lnfg_exp_tot08 lnrstaterev lnfedacres000_ipo lnfarms_500more_ipo lnfarmacres_ipo lntotacres indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft i.year if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007, cluster(fips)
eststo: quietly reg lnfg_exp_tot08 lnrstaterev lnavfarmsz_ipo lnfedacres000_ipo lntotacres lnfarmacres_ipo indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft i.year  if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007, cluster(fips)
esttab, se(%6.3f) b(%6.3f) keep(lnrstaterev lnfedacres000_ipo lnfarm1000_ipo lnfarms_500more_ipo  lnavfarmsz_ipo  )  star(* 0.1 ** 0.05 *** 0.01) r2

*TABLE A9: Panel Estimates of Agency Expenditures on Wildlife, 1952-2007 with All Coefficients
eststo clear
eststo: quietly xtreg lnfg_exp_tot08 lnrstaterev lnfarm1000_ipo lnfarmacres_ipo indep lnbea_pop lnbea_pci08 i.year if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007 , fe cluster(fips)
eststo: quietly xtreg lnfg_exp_tot08 lnrstaterev lnfarms_500more_ipo lnfarmacres_ipo indep lnbea_pop lnbea_pci08 if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007 , fe cluster(fips)
eststo: quietly xtreg lnfg_exp_tot08 lnrstaterev lnavfarmsz_ipo lnfarmacres_ipo  indep lnbea_pop lnbea_pci08  i.year  if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007 , fe cluster(fips)
eststo: quietly reg lnfg_exp_tot08 lnrstaterev lnfedacres000_ipo lnfarm1000_ipo lnfarmacres_ipo lntotacres indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft i.year  if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007, cluster(fips)
eststo: quietly reg lnfg_exp_tot08 lnrstaterev lnfedacres000_ipo lnfarms_500more_ipo lnfarmacres_ipo lntotacres indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft i.year if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007, cluster(fips)
eststo: quietly reg lnfg_exp_tot08 lnrstaterev lnavfarmsz_ipo lnfedacres000_ipo lntotacres lnfarmacres_ipo indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft i.year  if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007, cluster(fips)
esttab, se(%6.3f) b(%6.3f) keep(lnrstaterev lnfedacres000_ipo lnfarms_500more_ipo lnavfarmsz_ipo lnfarmacres_ipo lntotacres indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft _cons)  star(* 0.1 ** 0.05 *** 0.01) r2

*Generating region fixed effects and region x year fixed effects for Table A10

gen region1=0
replace region1=1 if state=="Connecticut"|state=="Maine"|state=="New Hampshire"|state=="Vermont"
replace region1=2 if state=="New Jersey"|state=="New York"|state=="Pennsylvania"
replace region1=3 if state=="Illinois"|state=="Indiana"|state=="Michigan"|state=="Ohio"|state=="Wisconsin"
replace region1=4 if state=="Iowa"|state=="Kansas"|state=="Minnesota"|state=="Missouri"|state=="Nebraska"|state=="North Dakota"|state=="South Dakota"
replace region1=5 if state=="Delaware"|state=="Virginia"|state=="Florida"|state=="Georgia"|state=="North Carolina"|state=="South Carolina"|state=="Maryland"|state=="West Virginia"
replace region1=6 if state=="Alabama"|state=="Mississippi"|state=="Kentucky"|state=="Tennessee"
replace region1=7 if state=="Arkansas"|state=="Louisiana"|state=="Texas"|state=="Oklahoma"
replace region1=8 if state=="Arizona"|state=="Colorado"|state=="Idaho"|state=="Montana"|state=="Nevada"|state=="New Mexico"|state=="Utah"|state=="Wyoming"
replace region1=9 if state=="California"|state=="Oregon"|state=="Washington"

tab region1, gen(reg1)

gen region2=0
replace region2=1 if region1==1|region1==2
replace region2=2 if region1==3|region1==4
replace region2=3 if region1==5
replace region2=4 if region1==6|region1==7
replace region2=5 if region1==8|region1==9

tab region2, gen(reg2)

*generating region x year FE*
foreach var of varlist year1-year69 {
gen reg21`var' = reg21*`var'
}
foreach var of varlist year1-year69 {
gen reg22`var' = reg22*`var'
}
foreach var of varlist year1-year69  {
gen reg23`var' = reg23*`var'
}
foreach var of varlist year1-year69 {
gen reg24`var' = reg24*`var'
}
foreach var of varlist year1-year69 {
gen reg25`var' = reg25*`var'
}
foreach var of varlist year1-year69{
gen reg26`var' = reg26*`var'
}

*TABLE A10: Panel Estimates of Agency Expenditures on Wildlife, 1952-2007 with All Coefficients & Region Fixed Effects
eststo clear 
eststo: quietly xtreg lnfg_exp_tot08 lnrstaterev lnfarm1000_ipo lnfarmacres_ipo indep lnbea_pop lnbea_pci08 i.year reg21year1- reg26year69 if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007 , fe cluster(fips)
eststo: quietly xtreg lnfg_exp_tot08 lnrstaterev lnfarms_500more_ipo lnfarmacres_ipo indep lnbea_pop lnbea_pci08 i.year reg21year1- reg26year69 if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007 , fe cluster(fips)
eststo: quietly xtreg lnfg_exp_tot08 lnrstaterev lnavfarmsz_ipo lnfarmacres_ipo  indep lnbea_pop lnbea_pci08 i.year reg21year1- reg26year69 if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007 , fe cluster(fips)
eststo: quietly reg lnfg_exp_tot08 lnrstaterev lnfedacres000_ipo lnfarm1000_ipo lnfarmacres_ipo lntotacres indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft i.year reg21-reg26 if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007, cluster(fips)
eststo: quietly reg lnfg_exp_tot08 lnrstaterev lnfedacres000_ipo lnfarms_500more_ipo lnfarmacres_ipo lntotacres indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft i.year reg21-reg26 if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007, cluster(fips)
eststo: quietly reg lnfg_exp_tot08 lnrstaterev lnavfarmsz_ipo lnfedacres000_ipo lntotacres lnfarmacres_ipo indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft i.year reg21-reg26 if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007, cluster(fips)
esttab, se(%6.3f) b(%6.3f) keep(lnrstaterev lnfedacres000_ipo lnfarm1000_ipo lnfarms_500more_ipo lnavfarmsz_ipo  lnfarmacres_ipo lntotacres indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft)  star(* 0.1 ** 0.05 *** 0.01) r2

*Prepping variables for Table A11 Placebo Estimates

gen hh_exp_tot08 =  hh_exp_tot*cpi_multiplier
gen pr_exp_tot08 = pr_exp_tot*cpi_multiplier
gen ag_exp_tot08 = ag_exp_tot*cpi_multiplier
gen for_exp_tot08 =for_exp_tot*cpi_multiplier

*Labeling Variables
label var hh_exp_tot08 "spending on health & hospitals, from govt finance survey, 2008 $s"
label var pr_exp_tot08 "spending on parks, from govt finance survey, 2008 $s"
label var pr_exp_tot08 "spending on agriculture, from govt finance survey, 2008 $s"
label var pr_exp_tot08 "spending on forests, from govt finance survey, 2008 $s"

gen lnhh_exp_tot=ln(hh_exp_tot08)
gen lnpr_exp_tot=ln(pr_exp_tot08)
gen lnfor_exp_tot=ln(for_exp_tot08)
gen lnag_exp_tot=ln(ag_exp_tot08)

*TABLE A11, PLACEBO ESTIMATES FOR HEALTH, PARKS, FORESTRY, AND AGRICULTURE
eststo clear
eststo: quietly xtreg lnhh_exp_tot lnrstaterev lnfarm1000_ipo lnfarmacres_ipo indep lnbea_pop lnbea_pci08  i.year if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007 , fe cluster(fips)
eststo: quietly xtreg lnpr_exp_tot lnrstaterev lnfarm1000_ipo lnfarmacres_ipo indep lnbea_pop lnbea_pci08 i.year if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007 , fe cluster(fips)
eststo: quietly xtreg lnag_exp_tot lnrstaterev lnfarm1000_ipo lnfarmacres_ipo indep lnbea_pop lnbea_pci08  i.year if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007 , fe cluster(fips)
eststo: quietly xtreg lnfor_exp_tot lnrstaterev lnfarm1000_ipo lnfarmacres_ipo indep lnbea_pop lnbea_pci08  i.year if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007 , fe cluster(fips)
eststo: quietly xtreg lnhh_exp_tot lnrstaterev lnavfarmsz_ipo lnfedacres000_ipo lntotacres lnfarmacres_ipo indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft  i.year if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007 , fe cluster(fips)
eststo: quietly xtreg lnpr_exp_tot lnrstaterev lnavfarmsz_ipo lnfedacres000_ipo lntotacres lnfarmacres_ipo indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft i.year if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007 , fe cluster(fips)
eststo: quietly xtreg lnag_exp_tot lnrstaterev lnavfarmsz_ipo lnfedacres000_ipo lntotacres lnfarmacres_ipo indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft  i.year if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007 , fe cluster(fips)
eststo: quietly xtreg lnfor_exp_tot lnrstaterev lnavfarmsz_ipo lnfedacres000_ipo lntotacres lnfarmacres_ipo indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft  i.year if year==1952|year==1957|year==1962|year==1967|year==1972|year==1977|year==1982|year==1987|year==1992|year==1997|year==2002|year==2007 , fe cluster(fips)
esttab, se(%6.3f) b(%6.3f) keep(lnrstaterev lnfarm1000_ipo lnavfarmsz_ipo lnfedacres000_ipo)  star(* 0.1 ** 0.05 *** 0.01) r2

*Inputting expenditures on nongame in each state for 1986, 1992, and 1998

gen ngexp=.
replace	ngexp=	171228.0702	if 	state==	"Alabama"	& year==	1986
replace	ngexp=	377543.8596	if 	state==	"Alaska"	& year==	1986
replace	ngexp=	701754.386	if 	state==	"Arizona"	& year==	1986
replace	ngexp=	175438.5965	if 	state==	"Arkansas"	& year==	1986
replace	ngexp=	21192982.46	if 	state==	"California"	& year==	1986
replace	ngexp=	1403508.772	if 	state==	"Colorado"	& year==	1986
replace	ngexp=	182456.1404	if 	state==	"Connecticut"	& year==	1986
replace	ngexp=	58947.36842	if 	state==	"Delaware"	& year==	1986
replace	ngexp=	2105263.158	if 	state==	"Florida"	& year==	1986
replace	ngexp=	196491.2281	if 	state==	"Georgia"	& year==	1986
replace	ngexp=	429473.6842	if 	state==	"Hawaii"	& year==	1986
replace	ngexp=	129122.807	if 	state==	"Idaho"	& year==	1986
replace	ngexp=	1964912.281	if 	state==	"Illinois"	& year==	1986
replace	ngexp=	428070.1754	if 	state==	"Indiana"	& year==	1986
replace	ngexp=	186666.6667	if 	state==	"Iowa"	& year==	1986
replace	ngexp=	686315.7895	if 	state==	"Kansas"	& year==	1986
replace	ngexp=	154385.9649	if 	state==	"Kentucky"	& year==	1986
replace	ngexp=	105263.1579	if 	state==	"Louisiana"	& year==	1986
replace	ngexp=	175438.5965	if 	state==	"Maine"	& year==	1986
replace	ngexp=	175438.5965	if 	state==	"Maryland"	& year==	1986
replace	ngexp=	416842.1053	if 	state==	"Massachusetts"	& year==	1986
replace	ngexp=	842105.2632	if 	state==	"Michigan"	& year==	1986
replace	ngexp=	960000	if 	state==	"Minnesota"	& year==	1986
replace	ngexp=	0	if 	state==	"Mississippi"	& year==	1986
replace	ngexp=	3508771.93	if 	state==	"Missouri"	& year==	1986
replace	ngexp=	284912.2807	if 	state==	"Montana"	& year==	1986
replace	ngexp=	350877.193	if 	state==	"Nebraska"	& year==	1986
replace	ngexp=	294736.8421	if 	state==	"Nevada"	& year==	1986
replace	ngexp=	0	if 	state==	"New Hampshire"	& year==	1986
replace	ngexp=	631578.9474	if 	state==	"New Jersey"	& year==	1986
replace	ngexp=	645614.0351	if 	state==	"New Mexico"	& year==	1986
replace	ngexp=	1868070.175	if 	state==	"New York"	& year==	1986
replace	ngexp=	280701.7544	if 	state==	"North Carolina"	& year==	1986
replace	ngexp=	70175.4386	if 	state==	"North Dakota"	& year==	1986
replace	ngexp=	491228.0702	if 	state==	"Ohio"	& year==	1986
replace	ngexp=	186666.6667	if 	state==	"Oklahoma"	& year==	1986
replace	ngexp=	725614.0351	if 	state==	"Oregon"	& year==	1986
replace	ngexp=	969824.5614	if 	state==	"Pennsylvania"	& year==	1986
replace	ngexp=	61754.38596	if 	state==	"Rhode Island"	& year==	1986
replace	ngexp=	421052.6316	if 	state==	"South Carolina"	& year==	1986
replace	ngexp=	70175.4386	if 	state==	"South Dakota"	& year==	1986
replace	ngexp=	315789.4737	if 	state==	"Tennessee"	& year==	1986
replace	ngexp=	252631.5789	if 	state==	"Texas"	& year==	1986
replace	ngexp=	997894.7368	if 	state==	"Utah"	& year==	1986
replace	ngexp=	70175.4386	if 	state==	"Vermont"	& year==	1986
replace	ngexp=	842105.2632	if 	state==	"Virginia"	& year==	1986
replace	ngexp=	1122807.018	if 	state==	"Washington"	& year==	1986
replace	ngexp=	161403.5088	if 	state==	"West Virginia"	& year==	1986
replace	ngexp=	280701.7544	if 	state==	"Wisconsin"	& year==	1986
replace	ngexp=	937543.8596	if 	state==	"Wyoming"	& year==	1986

replace	ngexp=	582277.0157	if 	state==	"Alabama"	& year==	1992
replace	ngexp=	318342.3048	if 	state==	"Alaska"	& year==	1992
replace	ngexp=	5632048.388	if 	state==	"Arizona"	& year==	1992
replace	ngexp=	231507.7849	if 	state==	"Arkansas"	& year==	1992
replace	ngexp=	1528043.063	if 	state==	"California"	& year==	1992
replace	ngexp=	4168702.9	if 	state==	"Colorado"	& year==	1992
replace	ngexp=	39358.68496	if 	state==	"Connecticut"	& year==	1992
replace	ngexp=	107251.2589	if 	state==	"Delaware"	& year==	1992
replace	ngexp=	2473809.11	if 	state==	"Florida"	& year==	1992
replace	ngexp=	892829.7737	if 	state==	"Georgia"	& year==	1992
replace	ngexp=	1203912.716	if 	state==	"Hawaii"	& year==	1992
replace	ngexp=	949751.693	if 	state==	"Idaho"	& year==	1992
replace	ngexp=	2752906.176	if 	state==	"Illinois"	& year==	1992
replace	ngexp=	560192.163	if 	state==	"Indiana"	& year==	1992
replace	ngexp=	226517.3352	if 	state==	"Iowa"	& year==	1992
replace	ngexp=	226916.7101	if 	state==	"Kansas"	& year==	1992
replace	ngexp=	365881.8082	if 	state==	"Kentucky"	& year==	1992
replace	ngexp=	210684.7254	if 	state==	"Louisiana"	& year==	1992
replace	ngexp=	404880.4769	if 	state==	"Maine"	& year==	1992
replace	ngexp=	653901.719	if 	state==	"Maryland"	& year==	1992
replace	ngexp=	548484.1118	if 	state==	"Massachusetts"	& year==	1992
replace	ngexp=	1551836.546	if 	state==	"Michigan"	& year==	1992
replace	ngexp=	1946217.515	if 	state==	"Minnesota"	& year==	1992
replace	ngexp=	288259.5358	if 	state==	"Mississippi"	& year==	1992
replace	ngexp=	6965144.412	if 	state==	"Missouri"	& year==	1992
replace	ngexp=	150053.8288	if 	state==	"Montana"	& year==	1992
replace	ngexp=	526555.5363	if 	state==	"Nebraska"	& year==	1992
replace	ngexp=	327603.1718	if 	state==	"Nevada"	& year==	1992
replace	ngexp=	104184.7543	if 	state==	"New Hampshire"	& year==	1992
replace	ngexp=	776176.4195	if 	state==	"New Jersey"	& year==	1992
replace	ngexp=	1524490.363	if 	state==	"New Mexico"	& year==	1992
replace	ngexp=	14574868.32	if 	state==	"New York"	& year==	1992
replace	ngexp=	534412.2243	if 	state==	"North Carolina"	& year==	1992
replace	ngexp=	60195.63582	if 	state==	"North Dakota"	& year==	1992
replace	ngexp=	817046.941	if 	state==	"Ohio"	& year==	1992
replace	ngexp=	287252.4165	if 	state==	"Oklahoma"	& year==	1992
replace	ngexp=	1960356.543	if 	state==	"Oregon"	& year==	1992
replace	ngexp=	951667.5349	if 	state==	"Pennsylvania"	& year==	1992
replace	ngexp=	352707.0672	if 	state==	"Rhode Island"	& year==	1992
replace	ngexp=	751287.8393	if 	state==	"South Carolina"	& year==	1992
replace	ngexp=	130578.2254	if 	state==	"South Dakota"	& year==	1992
replace	ngexp=	447415.6393	if 	state==	"Tennessee"	& year==	1992
replace	ngexp=	2137871.158	if 	state==	"Texas"	& year==	1992
replace	ngexp=	1833545.176	if 	state==	"Utah"	& year==	1992
replace	ngexp=	308832.5519	if 	state==	"Vermont"	& year==	1992
replace	ngexp=	1165982.52	if 	state==	"Virginia"	& year==	1992
replace	ngexp=	5967471.204	if 	state==	"Washington"	& year==	1992
replace	ngexp=	206870.4057	if 	state==	"West Virginia"	& year==	1992
replace	ngexp=	2012458.181	if 	state==	"Wisconsin"	& year==	1992
replace	ngexp=	5242425.19	if 	state==	"Wyoming"	& year==	1992

replace	ngexp=	479040.5506	if 	state==	"Alabama"	& year==	1998
replace	ngexp=	295422.506	if 	state==	"Alaska"	& year==	1998
replace	ngexp=	7161947.508	if 	state==	"Arizona"	& year==	1998
replace	ngexp=	458884.4432	if 	state==	"Arkansas"	& year==	1998
replace	ngexp=	.	if 	state==	"California"	& year==	1998
replace	ngexp=	5912798.532	if 	state==	"Colorado"	& year==	1998
replace	ngexp=	190298.7395	if 	state==	"Connecticut"	& year==	1998
replace	ngexp=	421954.5568	if 	state==	"Delaware"	& year==	1998
replace	ngexp=	9364157.476	if 	state==	"Florida"	& year==	1998
replace	ngexp=	9646247.616	if 	state==	"Georgia"	& year==	1998
replace	ngexp=	1523680.446	if 	state==	"Hawaii"	& year==	1998
replace	ngexp=	623915.7476	if 	state==	"Idaho"	& year==	1998
replace	ngexp=	6990836.719	if 	state==	"Illinois"	& year==	1998
replace	ngexp=	483041.7116	if 	state==	"Indiana"	& year==	1998
replace	ngexp=	234258.645	if 	state==	"Iowa"	& year==	1998
replace	ngexp=	318745.3354	if 	state==	"Kansas"	& year==	1998
replace	ngexp=	550914.2549	if 	state==	"Kentucky"	& year==	1998
replace	ngexp=	557674.7657	if 	state==	"Louisiana"	& year==	1998
replace	ngexp=	1135044.365	if 	state==	"Maine"	& year==	1998
replace	ngexp=	1220675.429	if 	state==	"Maryland"	& year==	1998
replace	ngexp=	781893.1918	if 	state==	"Massachusetts"	& year==	1998
replace	ngexp=	4732720.375	if 	state==	"Michigan"	& year==	1998
replace	ngexp=	1307115.018	if 	state==	"Minnesota"	& year==	1998
replace	ngexp=	1749730.492	if 	state==	"Mississippi"	& year==	1998
replace	ngexp=	11581978.19	if 	state==	"Missouri"	& year==	1998
replace	ngexp=	2875408.409	if 	state==	"Montana"	& year==	1998
replace	ngexp=	549190.4387	if 	state==	"Nebraska"	& year==	1998
replace	ngexp=	565967.3273	if 	state==	"Nevada"	& year==	1998
replace	ngexp=	195419.3963	if 	state==	"New Hampshire"	& year==	1998
replace	ngexp=	883676.0925	if 	state==	"New Jersey"	& year==	1998
replace	ngexp=	796241.3965	if 	state==	"New Mexico"	& year==	1998
replace	ngexp=	1841521.892	if 	state==	"New York"	& year==	1998
replace	ngexp=	801022.0582	if 	state==	"North Carolina"	& year==	1998
replace	ngexp=	70486.77336	if 	state==	"North Dakota"	& year==	1998
replace	ngexp=	2837432.623	if 	state==	"Ohio"	& year==	1998
replace	ngexp=	678616.5934	if 	state==	"Oklahoma"	& year==	1998
replace	ngexp=	1568218.758	if 	state==	"Oregon"	& year==	1998
replace	ngexp=	558711.3359	if 	state==	"Pennsylvania"	& year==	1998
replace	ngexp=	53900.61365	if 	state==	"Rhode Island"	& year==	1998
replace	ngexp=	836027.0338	if 	state==	"South Carolina"	& year==	1998
replace	ngexp=	489779.4179	if 	state==	"South Dakota"	& year==	1998
replace	ngexp=	1401304.005	if 	state==	"Tennessee"	& year==	1998
replace	ngexp=	1938386.268	if 	state==	"Texas"	& year==	1998
replace	ngexp=	1579701.882	if 	state==	"Utah"	& year==	1998
replace	ngexp=	392534.6214	if 	state==	"Vermont"	& year==	1998
replace	ngexp=	1144373.497	if 	state==	"Virginia"	& year==	1998
replace	ngexp=	9425074.633	if 	state==	"Washington"	& year==	1998
replace	ngexp=	783854.3826	if 	state==	"West Virginia"	& year==	1998
replace	ngexp=	2186312.091	if 	state==	"Wisconsin"	& year==	1998
replace	ngexp=	3255348.702	if 	state==	"Wyoming"	& year==	1998

*Putting expenditures in 2008 dollars and replacing null spending with zeroes for a few states
gen perngexp08= ngexp*cpi_multiplier/(fg_exp_tot08*1000)
replace perngexp08=0 if year==1986 & perngexp08==.
replace perngexp08=0 if year==1992 & perngexp08==.
gen lnnongame_exp=ln(ngexp)

*Table 4: Pooled Estimates of Nongame expenditures
eststo clear 
eststo: quietly reg lnnongame_exp lnrstaterev lntotacres lnfarmacres_ipo  lnfedacres000_ipo lnavfarmsz_ipo   indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft i.year, cluster(fips)
eststo: quietly reg lnnongame_exp lnrstaterev lntotacres lnfarmacres_ipo  lnfedacres000_ipo lnavfarmsz_ipo  indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft reg21-reg26 i.year, cluster(fips)
eststo: quietly reg perngexp08 lnrstaterev lntotacres lnfarmacres_ipo  lnfedacres000_ipo lnavfarmsz_ipo  indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft i.year, cluster(fips)
eststo: quietly reg perngexp08 lnrstaterev lntotacres lnfarmacres_ipo  lnfedacres000_ipo lnavfarmsz_ipo  indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft reg21-reg26 i.year, cluster(fips)
esttab, se(%6.3f) b(%6.3f) keep(lnrstaterev lnfedacres000_ipo  lnavfarmsz_ipo _cons )  star(* 0.1 ** 0.05 *** 0.01) r2

*Table A12: Pooled Estimates of Nongame expenditures with all Coefficients
eststo clear 
eststo: quietly reg lnnongame_exp lnrstaterev lnfedacres000_ipo lnavfarmsz_ipo  lntotacres lnfarmacres_ipo indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft i.year, cluster(fips)
eststo: quietly reg lnnongame_exp lnrstaterev lnfedacres000_ipo lnavfarmsz_ipo  lntotacres lnfarmacres_ipo indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft reg21-reg26 i.year, cluster(fips)
eststo: quietly reg perngexp08 lnrstaterev lnfedacres000_ipo lnavfarmsz_ipo  lntotacres lnfarmacres_ipo  indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft i.year, cluster(fips)
eststo: quietly reg perngexp08 lnrstaterev lnfedacres000_ipo lnavfarmsz_ipo  lntotacres lnfarmacres_ipo   indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft reg21-reg26 i.year, cluster(fips)
esttab, se(%6.3f) b(%6.3f) keep(lnrstaterev lnfedacres000_ipo lnavfarmsz_ipo  lntotacres lnfarmacres_ipo    indep lnbea_pop lnbea_pci08 lnprecip_inch lnmean_elev_ft _cons )  star(* 0.1 ** 0.05 *** 0.01) r2